//TBWM01AB JOB (0371,PROD,,999),'71P000',CLASS=1,NOTIFY=TBWM01A,
//         MSGCLASS=Q,REGION=1300K
/*ROUTE PRINT LOCAL
//**********************************************************
//SPUFI OUTPUT CLASS=A,COPIES=1,DEST=LOCAL,
//             FORMS=,FCB=,UCS=
//BIND001  EXEC PGM=IKJEFT01,
//     DYNAMNBR=30,
//       REGION=3M
//STEPLIB  DD  DISP=SHR,DSN=DSN1.DB2.TEST.DSNLOAD
//SYSUDUMP DD  SYSOUT=*
//SYSTSPRT DD  SYSOUT=*
//SYSPRINT DD  SYSOUT=*
//SYSABOUT DD  SYSOUT=*
//SYSDBOUT DD  SYSOUT=*
//SYSOUT   DD  SYSOUT=*
//DBRMLIB  DD  DSN=SYSTUD2.UVD2.DBRM,DISP=SHR
//SYSTSIN  DD *
DSN SYSTEM(DB2T)
  BIND PLAN(PQLJR01)  MEMBER(PQLJR01) -
  OWNER(PQAD2LO) -
  ACTION(REPLACE) -
  ISOLATION(CS) -
  RETAIN -
  EXPLAIN(YES) -
  VALIDATE(BIND)
  END
//SYSIN    DD *
/*
